https://ardozseven.blogspot.com/2014/01/31-how-to-label-points-in-r.html